0 REM OPEN1,8,15,"S:SORT>VERW.BAS":CLOSE1:SAVE"SORT>VERW.BAS",8
1 REM BY SKERNSOFT 1999
4 PRINT"[208]ROGRAMM ZUM [197]NTFERNEN EINER VROGESTEL-  LTEN [218]AHL IN EINER [211][197][209] [196]ATEI.
6 [153]"STR$IE LETZTEN 4 (null)EICHEN WERDEN ENTFERNT.
7 FORI=0TO 52:READA:POKE49152+I,A:NEXT
10 INPUT "FILENAME,U";N$,U
60 OPEN1,U,0,N$+",S":N$=LEFT$(N$,LEN(N$)-4)
61 OPEN2,U,1,N$+",S"
65 PRINT"ENFERNE [218]AHL ...
66 [132]1,A:[153]A
70 [158]49152&1,A$:[139]ST[167] F[178]1
75 [152]2,A$:[139] ST[167] F[178]1
80 [139] F[178]0[167] 70
90 [160]1:[160]2
95 [153]"OK."
99 [128]
32000 [131]32,155,183,32,30,225,32,253,174,32,139,176,133,73,132,74,32,163,182
32001 [131]169,89,32,117,180,160,2,185,97,0,145,73,136,16,248,200,32,18,225,145
32002 [131]98,201,13,208,246,152,160,0,145,73,32,204,255,96